<script>on mouseEnterDisplayHelp "Enter the name of the service defined by this card."end mouseEnter________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave</script>
</part>
<part>
<id>12</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>3</left>
<top>47</top>
<right>72</right>
<bottom>100</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseEnterDisplayHelp "Enter any notes and general information concerning the service."end mouseEnter_________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave</script>
</part>
<part>
<id>13</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>3</left>
<top>99</top>
<right>72</right>
<bottom>160</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseEnterDisplayHelp "The two fields to the right contain the login and logout scripts associated with the service. The scripts may be created/editted by selecting the appropriate 'Edit' menu item or double-clicking the appropriate field."end mouseEnter_________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave</script>
</part>
<part>
<id>14</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>336</left>
<top>60</top>
<right>483</right>
<bottom>80</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>New Button</name>
<script>on mouseEnterDisplayHelp "Click here and the resulting pop-up menu will allow you to choose the number of pages to be scrolled by the service."end mouseEnter_________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave_________________________________________________________________________on mouseDownput the rect of bkgnd field "Scroll" into Rectput bkgnd field "Scroll" into Optionput popupMenu(Rect, "1,2,3,4,5,7,10", Option) into Optionif Option <> empty then put Option into bkgnd field "Scroll"end mouseDown</script>
<script>on mouseEnterDisplayHelp "Click here and the resulting pop-up menu will allow you to choose the Connection tool to be used to connect to this service."end mouseEnter____________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information."end mouseLeave___________________________________________________________________________________on mouseDownglobal Connectionsput bkgnd field "ConnType" into Optionput the rect of bkgnd field "ConnType" into Rectput popupMenu(Rect, Connections, Option) into Optionif Option <> -1 thenif Option <> empty thenset cursor to busyif (Option = bkgnd field "ConnType") thenput bkgnd field "ConnTokens" into Tokenselseput empty into Tokensend ifput CTBConfigureConn(Option, Tokens) into Settingsif Settings <> -1 thenput item 1 of Settings into bkgnd field "ConnType"put item 2 of Settings into bkgnd field "ConnTokens"end ifend ifend ifend mouseDown</script>
</part>
<part>
<id>17</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>3</left>
<top>203</top>
<right>148</right>
<bottom>225</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseEnterDisplayHelp "Click here and the resulting pop-up menu will allow you to choose the Terminal Emulation tool to be used to support this service."end mouseEnter____________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information."end mouseLeave___________________________________________________________________________________on mouseDownglobal Terminalsput bkgnd field "TermType" into Optionput the rect of bkgnd field "TermType" into Rectput popupMenu(Rect, Terminals, Option) into Optionif Option <> -1 thenif Option <> empty thenif Option <> "None" thenset cursor to busyif (Option = bkgnd field "TermType") thenput bkgnd field "TermTokens" into Tokenselseput empty into Tokensend ifput TestWindow(0, "Test", 3) into Ptrif Ptr > 0 thenput CTBConfigureTerm(Option, Tokens, Ptr) into Settingsif Settings <> -1 thenput item 1 of Settings into bkgnd field "TermType"put item 2 of Settings into bkgnd field "TermTokens"end ifsend "Delete" to window "Test"end ifelseput Option into bkgnd field "TermType"put empty into bkgnd field "TermTokens"end ifend ifend ifend mouseDown</script>
</part>
<part>
<id>18</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>3</left>
<top>224</top>
<right>253</right>
<bottom>242</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseEnterDisplayHelp "The field below contains the configuration 'Tokens', (communication parameters) associated with the Connection tool."end mouseEnter_________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave</script>
</part>
<part>
<id>20</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>335</left>
<top>44</top>
<right>424</right>
<bottom>61</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseEnterDisplayHelp "If the service is to be password protected then enter the required password, if the field is left blank then no password protection will be applied. "end mouseEnter________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave</script>
</part>
<part>
<id>21</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>305</left>
<top>162</top>
<right>481</right>
<bottom>186</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>New Button</name>
<script>on mouseEnterDisplayHelp "Click here and the resulting pop-up menu will allow you to choose the number of times a line of script will be tryed before an error is returned by the script execution routine"end mouseEnter_________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave_________________________________________________________________________on mouseDownput the rect of bkgnd field "Retrys" into Rectput bkgnd field "Retrys" into Optionput popupMenu(Rect, "0,1,2,3,4,5", Option) into Optionif Option <> empty then put Option into bkgnd field "Retrys"end mouseDown</script>
</part>
<part>
<id>22</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>336</left>
<top>79</top>
<right>475</right>
<bottom>97</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>New Button</name>
<script>on mouseEnterDisplayHelp "Click here and the resulting pop-up menu will allow you to determine if the break function may be used with this service"end mouseEnter_________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave_________________________________________________________________________on mouseDownput the rect of bkgnd field "Break" into Rectput bkgnd field "Break" into Optionput popupMenu(Rect, "No,Yes", Option) into Optionif Option <> empty then put Option into bkgnd field "Break"end mouseDown</script>
</part>
<part>
<id>24</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>252</left>
<top>223</top>
<right>505</right>
<bottom>241</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseEnterDisplayHelp "The field below contains the configuration 'Tokens', (terminal settings) associated with the Terminal Emulation tool."end mouseEnter_________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave</script>
</part>
<part>
<id>25</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>372</left>
<top>295</top>
<right>413</right>
<bottom>342</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>24694</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Help</name>
<script>on mouseEnterDisplayHelp "Position the mouse over the label about which you require information or click here to turn the help facility off"end mouseEnter________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave________________________________________________________________________on mouseUpif the highlite of me is true thenset the highlite of me to falsehide bkgnd field "Help"elseset the highlite of me to trueshow bkgnd field "Help"DisplayHelp "Position the mouse over the label about which you require information or click here turn the help facility off"end ifend mouseUp</script>
</part>
<part>
<id>27</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>461</left>
<top>294</top>
<right>508</right>
<bottom>342</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>20186</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<name>Process</name>
<script>on mouseEnterDisplayHelp "Click here to add the new service details to the existing list of services and then return to the menu card."end mouseEnter_______________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave________________________________________________________________________on mouseUp---- Firstly check that the service name is OK--if bkgnd field "Service" = empty thenbeepanswer "The service name field has been left black !!" & return & ¬"The service will only be added to the current list of services if this field is complete." with "Continue"put empty into bkgnd field "Service"send tabkey to this cardexit mouseUpelseput fld "Services" in card "Menu" into Temprepeat with i = 1 to (the number of lines in Temp)if bkgnd field "Service" = line i of Temp thenbeepanswer "The selected service name is already in use." with "Continue"put empty into bkgnd field "Service"send tabkey to this cardexit mouseUpend ifend repeatend if---- OK to go ahead and add card to list--lock screenset lockmessages to truepush cardaddNewServiceresetServicepop cardset lockmessages to falsego to card "Menu"unlock screen with dissolve fastend mouseUp</script>
</part>
<part>
<id>28</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>118</left>
<top>26</top>
<right>363</right>
<bottom>42</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Service</name>
<script>on returnInfieldsend mouseUp to bkgnd button "Process"end returnInField</script>
</part>
<part>
<id>46</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>71</left>
<top>47</top>
<right>337</right>
<bottom>97</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Notes</name>
<script>on mouseDownend mouseDown</script>
</part>
<part>
<id>35</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>423</left>
<top>45</top>
<right>505</right>
<bottom>61</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Password</name>
<script></script>
</part>
<part>
<id>32</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>118</left>
<top>166</top>
<right>307</right>
<bottom>182</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>TermString</name>
<script></script>
</part>
<part>
<id>29</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>71</left>
<top>110</top>
<right>284</right>
<bottom>162</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Connection</name>
<script>on mouseUpglobal LastTimeif (the ticks - LastTime) < 20 thendoMenu "Edit Login Script"elseput the ticks into LastTimeend ifend mouseUp</script>
</part>
<part>
<id>30</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>300</left>
<top>110</top>
<right>505</right>
<bottom>162</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Disconnection</name>
<script>on mouseUpglobal LastTimeif (the ticks - LastTime) < 20 thendoMenu "Edit Logout Script"elseput the ticks into LastTimeend ifend mouseUp</script>
</part>
<part>
<id>31</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>481</left>
<top>63</top>
<right>505</right>
<bottom>79</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Scroll</name>
<script>on mouseDownput popupMenu(the rect of me, "1,2,3,4,5,7,10", me) into Optionif Option <> empty then put Option into meend mouseDown</script>
</part>
<part>
<id>33</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>10</left>
<top>240</top>
<right>257</right>
<bottom>290</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>ConnTokens</name>
<script></script>
</part>
<part>
<id>36</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>481</left>
<top>166</top>
<right>505</right>
<bottom>182</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Retrys</name>
<script>on mouseDownput popupMenu(the rect of me, "0,1,2,3,4,5", me) into Optionif Option <> empty then put Option into meend mouseDown</script>
</part>
<part>
<id>37</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>474</left>
<top>81</top>
<right>505</right>
<bottom>97</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Break</name>
<script>on mouseDownput popupMenu(the rect of me, "No,Yes", me) into Optionif Option <> empty then put Option into meend mouseDown</script>
</part>
<part>
<id>39</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>147</left>
<top>188</top>
<right>317</right>
<bottom>204</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>ConnType</name>
<script>on mouseDownglobal Connectionsput bkgnd field "ConnType" into Optionput popupMenu(the Rect of me, Connections, Option) into Optionif Option <> -1 thenif Option <> empty thenset cursor to busyif (Option = bkgnd field "ConnType") thenput bkgnd field "ConnTokens" into Tokenselseput empty into Tokensend ifput CTBConfigureConn(Option, Tokens) into Settingsif Settings <> -1 thenput item 1 of Settings into bkgnd field "ConnType"put item 2 of Settings into bkgnd field "ConnTokens"end ifend ifend ifend mouseDown</script>
</part>
<part>
<id>40</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>147</left>
<top>208</top>
<right>317</right>
<bottom>224</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>TermType</name>
<script>on mouseDownglobal Terminalsput bkgnd field "TermType" into Optionput popupMenu(the Rect of me, Terminals, Option) into Optionif Option <> -1 thenif Option <> empty thenif Option <> "None" thenset cursor to busyif (Option = bkgnd field "TermType") thenput bkgnd field "TermTokens" into Tokenselseput empty into Tokensend ifput TestWindow(0, "Test", 3) into Ptrif Ptr > 0 thenput CTBConfigureTerm(Option, Tokens, Ptr) into Settingsif Settings <> -1 thenput item 1 of Settings into bkgnd field "TermType"put item 2 of Settings into bkgnd field "TermTokens"end ifsend "Delete" to window "Test"end ifelseput Option into bkgnd field "TermType"put empty into bkgnd field "TermTokens"end ifend ifend ifend mouseDown</script>
</part>
<part>
<id>41</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>267</left>
<top>240</top>
<right>505</right>
<bottom>290</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>TermTokens</name>
<script></script>
</part>
<part>
<id>42</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>5</left>
<top>297</top>
<right>370</right>
<bottom>339</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>10</textSize>
<textStyle>plain</textStyle>
<textHeight>13</textHeight>
<name>Help</name>
<script>on mousedownhide meset the highlite of background button "Help" to falseend mousedown________________________________________________________________________on mouseEnterDisplayHelp "Position the mouse over the label about which you require information or click here to turn the help facility off"end mouseEnter________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave</script>
</part>
<part>
<id>47</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>71</left>
<top>96</top>
<right>297</right>
<bottom>111</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseEnterDisplayHelp "This field below contains the script lines necessary to login to the service."end mouseEnter_________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave</script>
</part>
<part>
<id>48</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>296</left>
<top>96</top>
<right>507</right>
<bottom>111</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseEnterDisplayHelp "The field below contains the script lines necessary to logout from the service."end mouseEnter_________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave</script>
</part>
<part>
<id>50</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>414</left>
<top>295</top>
<right>461</right>
<bottom>341</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>4856</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Cancel</name>
<script>on mouseEnterDisplayHelp "Click here to cancel the process of defining a new service and return to the menu card."end mouseEnter_______________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave________________________________________________________________________on mouseUpresetServicevisual effect dissolve fastgo to card "Menu"end mouseUp</script>
</part>
<part>
<id>51</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>474</left>
<top>188</top>
<right>505</right>
<bottom>204</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>ConnMenu</name>
<script>on mouseDownput popupMenu(the rect of me, "No,Yes", me) into Optionif Option <> empty then put Option into meend mouseDown</script>
</part>
<part>
<id>52</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>474</left>
<top>208</top>
<right>505</right>
<bottom>224</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>TermMenu</name>
<script>on mouseDownput popupMenu(the rect of me, "No,Yes", me) into Optionif Option <> empty then put Option into meend mouseDown</script>
</part>
<part>
<id>53</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>329</left>
<top>185</top>
<right>474</right>
<bottom>206</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseEnterDisplayHelp "If the selected Connection tool has an associated menu then if you click here the resulting pop-up menu will allow you to determine if the menu is to be added to the service menubar"end mouseEnter_________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave_________________________________________________________________________on mouseDownput the rect of bkgnd field "ConnMenu" into Rectput bkgnd field "ConnMenu" into Optionput popupMenu(Rect, "No,Yes", Option) into Optionif Option <> empty then put Option into bkgnd field "ConnMenu"end mouseDown</script>
</part>
<part>
<id>54</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>329</left>
<top>205</top>
<right>475</right>
<bottom>224</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseEnterDisplayHelp "If the selected Terminal Emulation tool has an associated menu then if you click here the resulting pop-up menu will allow you to determine if the menu is to be added to the service menubar"end mouseEnter_________________________________________________________________________on mouseLeaveDisplayHelp "Position the mouse over the label about which you require information"end mouseLeave_________________________________________________________________________on mouseDownput the rect of bkgnd field "TermMenu" into Rectput bkgnd field "TermMenu" into Optionput popupMenu(Rect, "No,Yes", Option) into Optionif Option <> empty then put Option into bkgnd field "TermMenu"end mouseDown</script>
</part>
<name>New Service</name>
<script>on openBackgroundput "-,Edit Login Script,Edit Logout Script" after menu "Edit"enable menu "Edit"end openBackgroundon closeBackgrounddelete menuitem 9 from menu "Edit"delete menuitem 8 from menu "Edit"delete menuitem 7 from menu "Edit"disable menu "Edit"set the highlite of background button "Help" to falsehide bkgnd field "Help"end closeBackgroundon doMenu ItemID, MenuIDGlobal Clickedif menuID = "Edit" thenif itemID = "Edit Login Script" thenset cursor to busylock screenput the short name of this card into item 1 of bkgnd field "Return" in card "Script"put "Connection" into item 2 of bkgnd field "Return" in card "Script"put bkgnd field "Connection" into bkgnd field "Script" in card "Script"go to card "Script"put 1 into Clickedunlock screen with dissolve fastexit doMenuend ifif itemID = "Edit Logout Script" thenset cursor to busylock screenput the short name of this card into item 1 of bkgnd field "Return" in card "Script"put "Disconnection" into item 2 of bkgnd field "Return" in card "Script"put bkgnd field "Disconnection" into bkgnd field "Script" in card "Script"go to card "Script"put 1 into Clickedunlock screen with dissolve fastexit doMenuend ifend ifpass doMenuend doMenuon AddNewServiceset cursor to busygo to last card of background "Service"doMenu "New Card"put the number of bkgnd fields into xToprepeat with x = 1 to xTopput bkgnd field x in card "New Service" into bkgnd field xend repeatUpdateServiceNames empty, bkgnd field "Service"set the name of this card to bkgnd field "Service"end AddNewServiceon ResetServiceput empty into bkgnd field "Service" in card "New Service"put empty into bkgnd field "Notes" in card "New Service"end ResetService</script>
